home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C / Games / Xconq 7.1.0 / lib / 1757.g < prev    next >
Encoding:
Text File  |  1996-04-04  |  5.2 KB  |  181 lines  |  [TEXT/XCNQ]
  1. (game-module "1757"
  2.   (title "Europe 1757")
  3.   (blurb "Central Europe, April, 1757.")
  4.   (base-module "fred")
  5. )
  6.  
  7. (include "t-cent-eur")
  8.  
  9. ;;; Modify the defaults in fred.
  10.  
  11. (add u* start-with 0)
  12.  
  13. ;;; Everybody has joined the war now.
  14.  
  15. (side 1 (name "Prussia") (adjective "Prussian") (emblem-name "arms-prussia"))
  16. (side 2 (name "Hannover") (adjective "Hannoverian") (emblem-name "arms-hannover"))
  17. (side 3 (name "Austria") (adjective "Austrian") (emblem-name "arms-austria"))
  18. (side 4 (name "Saxony") (adjective "Saxon") (emblem-name "arms-saxony"))
  19. (side 5 (name "France") (adjective "French") (emblem-name "arms-france"))
  20. (side 6 (name "Russia") (adjective "Russian") (emblem-name "arms-russia"))
  21. (side 7 (name "Sweden") (adjective "Swedish") (emblem-name "arms-sweden"))
  22. (side 8 (name "Empire") (adjective "Empire") #|(emblem-name "arms-sweden")|#)
  23.  
  24. (side 1 (trusts (1 1) (2 1)))
  25. (side 2 (trusts (1 1) (2 1)))
  26.  
  27. (side 4 (controlled-by 1))
  28.  
  29. (side 3 (trusts (3 1) (5 1) (6 1) (7 1) (8 1)))
  30. (side 5 (trusts (3 1) (5 1) (6 1) (7 1) (8 1)))
  31. (side 6 (trusts (3 1) (5 1) (6 1) (7 1) (8 1)))
  32. (side 7 (trusts (3 1) (5 1) (6 1) (7 1) (8 1)))
  33. (side 8 (trusts (3 1) (5 1) (6 1) (7 1) (8 1)))
  34.  
  35. (set sides-max 8)
  36.  
  37. ;; (should put towns and fortresses into a separate module)
  38.  
  39. (town (n "Danzig") (@ 35 35))
  40. (town (n "Hamburg") (@ 12 32))
  41. (town (n "Emden") (@ 8 30))
  42. (town (n "Thorn") (@ 38 29))
  43. (town (n "Bremen") (@ 13 28))
  44. (town (n "Posen") (@ 36 25))
  45. (town (n "Cassel") (@ 18 19))
  46. (town (n "Leipzig") (@ 27 18))
  47. (town (n "Chemnitz") (@ 29 16))
  48. (town (n "Eger") (@ 31 12))
  49. (town (n "Wurzburg") (@ 24 11))
  50. (town (n "Donauworth") (@ 29 6))
  51. (town (n "Regensburg") (@ 32 6))
  52. (town (n "Passau") (@ 36 5))
  53. (town (n "Ulm") (@ 27 4))
  54.  
  55. (fortress 22 23 1 (n "Magdeburg"))
  56. (fortress (n "Berlin") (@ 25 26) (s 1))
  57. (fortress (n "Stettin") (@ 26 30))
  58. (fortress (n "Kustrin") (@ 30 25) (s 1))
  59. (fortress 36 21 1 (n "Glogau") (s 1))
  60. (fortress (n "Colberg") (@ 29 34) (s 1))
  61. (fortress (n "Schweidinitz") (@ 39 17) (s 3))
  62. (fortress 40 18 1 (n "Breslau") (s 1))
  63. (fortress (n "Glatz") (@ 40 16) (s 1))
  64. (fortress (n "Brieg") (@ 42 17) (s 1))
  65. (fortress (n "Neisse") (@ 43 15) (s 1))
  66. (fortress (n "Munster") (@ 11 23))
  67. (fortress (n "Minden") (@ 14 24))
  68. (fortress (n "Hannover") (@ 17 25) (s 2))
  69. (fortress (n "Stade") (@ 12 31) (s 2))
  70. (fortress (n "Prague") (@ 35 12) (s 3))
  71. (fortress (n "Brunn") (@ 44 7))
  72. (fortress (n "Olmutz") (@ 46 9) (s 3))
  73. (fortress (n "Vienna") (@ 46 3) (s 3))
  74. (fortress (n "Koniggratz") (@ 40 13))
  75. (fortress (n "Nuremberg") (@ 28 9) (s 8))
  76. (fortress (n "Torgau") (@ 28 19) (s 1) (os 4))
  77. (fortress (n "Dresden") (@ 31 17) (s 1) (os 4))
  78. (fortress (n "Metz") (@ 15 8) (s 5))
  79. (fortress (n "Strasbourg") (@ 20 5) (s 5))
  80. (fortress (n "Venlo") (@ 7 20))
  81. (fortress (n "Roermond") (@ 9 18))
  82. (fortress (n "Cologne") (@ 12 17) (s 5))
  83. (fortress (n "Coblenz") (@ 15 14) (s 5))
  84. (fortress (n "Dusseldorf") (@ 11 19))
  85. (fortress (n "Mainz") (@ 18 12) (s 5))
  86. (fortress (n "Wesel") (@ 9 22))
  87. (fortress (n "Frankfort") (@ 20 13) (s 5))
  88. (fortress (n "Konigsberg") (@ 38 38) (s 1))
  89. (fortress (n "Stralsund") (@ 20 34) (s 7))
  90.  
  91. (fortress (@ 39 39) (s 6))
  92.  
  93. (army 25 26 1 (hp 2))
  94. (army 30 25 1 (hp 2))
  95. (army 22 23 1 (hp 7))
  96. (army 28 19 1 (hp 2))
  97. (army 40 18 1 (hp 4))
  98. (army 34 17 1 (hp 18))
  99. (army 42 17 1 (hp 2))
  100. (army 43 15 1 (hp 2))
  101. (army 40 16 1 (hp 2))
  102. (army 39 17 1 (hp 34))
  103. (army 36 21 1)
  104. (army 26 30 1 (hp 20))
  105. (army 31 17 1 (hp 20))
  106. (general 31 17 1 (n "Keith"))
  107. (general 29 16 1 (n "Maurice"))
  108. (general 26 30 1 (n "Lehwaldt"))
  109. (marshal 34 17 1 (n "Brunswick"))
  110. (marshal 39 17 1 (n "Schwerin"))
  111. (prince 31 17 1 (n "Henry"))
  112. ;(prince -1 -1 1 (n "Ferdinand"))
  113. (king 31 17 1 (n "Frederick"))
  114.  
  115. (army 12 31 2 (hp 2))
  116. (army 13 28 2 (hp 2))
  117. (army 15 25 2 (hp 2))
  118. (army 17 25 2 (hp 8))
  119. (army 14 24 2 (hp 5))
  120. (army 16 23 2 (hp 7))
  121. (general 14 24 2 (n "Karl"))
  122. (marshal 16 23 2 (n "Zastrow"))
  123. (prince 17 25 2 (n "Cumberland"))
  124.  
  125. (army 36 16 3 (hp 28))
  126. (army 40 13 3 (hp 27))
  127. (army 31 12 3 (hp 24))
  128. (army 44 7 3 (hp 8))
  129. (army 46 9 3 (hp 10))
  130. (army 46 3 3 (hp 8))
  131. (army 35 12 3 (hp 15))
  132. (general 31 12 3 (n "Darenberg"))
  133. (general 36 16 3 (n "Koenigsegg"))
  134. (general 46 9 3 (n "Nadasy"))
  135. (marshal 35 12 3 (n "Browne"))
  136. (marshal 40 13 3 (n "Serbeloni"))
  137. (marshal 46 3 3 (n "Daun"))
  138. (king 35 12 3 (n "Charles"))
  139. (depot 36 16 3)
  140.  
  141. (army 29 17 4 (hp 1))
  142.  
  143. (army 9 22 5 (hp 8))
  144. (army 11 19 5 (hp 8))
  145. (army 9 18 5 (hp 24))
  146. (army 12 17 5)
  147. (army 15 14 5)
  148. (army 20 13 5)
  149. (army 18 12 5)
  150. (army 15 8 5)
  151. (army 7 20 5 (hp 30))
  152. (army -20 -5 5 (hp 20) (cp -1) (appear 10))
  153. (general 7 20 5 (n "Broglie"))
  154. (general 9 22 5 (n "Chevert"))
  155. (general 9 18 5 (n "Contades"))
  156. (general 11 19 5 (n "St. Germain"))
  157. (marshal 7 20 5 (n "D'Estrees"))
  158. (marshal -20 -5 5 (cp -1) (n "Soubise") (appear 10))
  159.  
  160. (army -39 -38 6 (hp 40) (cp -1) (appear 8))
  161. (general -39 -38 6 (n "Fermor") (cp -1) (appear 8))
  162. (marshal -39 -38 6 (n "Apraxin") (cp -1) (appear 8))
  163.  
  164. (army 20 34 7 (hp 20))
  165. (marshal 20 34 7 (n "Hamilton"))
  166.  
  167. (army 28 9 8 (hp 1))
  168. (army -28 -9 8 (hp 18) (cp -1) (appear 8))
  169. (marshal -28 -9 8 (n "von Sachsen-Hildburghausen") (cp -1) (appear 8))
  170.  
  171. ;;; Need some better scorekeepers.
  172.  
  173. (scorekeeper (do last-side-wins))
  174.  
  175. (set initial-date "Apr 1757")
  176.  
  177. ;;; Game only lasts until the end of the year (armies would
  178. ;;; invariably go into winter quarters from December thru March).
  179.  
  180. (set last-turn 18)
  181.